(f90-mode-abbrev-table): Use mapc rather than mapcar.

diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index 6c704916c651075227600f144eba9666ce5f076f..c7042fb1f671dfda3b9a7b31b1f5b38206244ed2 100644 (file)
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -682,7 +682,7 @@ Used in the F90 entry in `hs-special-modes-alist'.")
 (let (abbrevs-changed)
   ;; Use the 6th arg (SYSTEM-FLAG) of define-abbrev if possible.
   ;; A little baroque to quieten the byte-compiler.
-  (mapcar
+  (mapc
    (function (lambda (element)
                (condition-case nil
                    (apply 'define-abbrev f90-mode-abbrev-table